   1 .
   2 .ALPHABET PUZZLE
   3 .
  10 clear ;BC=8;FC=11;&(10)=0;&(9)=50;NT=0;box 0,0,48,86,1;box 0,0,44,84,2
  12 CX=-12;CY=32;print "A L";print ;CX=-12;print "P H A";print ;CX=-12;print "B E T";print ;CX=-12;print "P U Z";print ;CX=-12;print "Z L E
  14 NT=1;for T=-74to -24step 3;box T,0,1,86,3;MU=T+123;next T;for T=25to 75step 3;box T,0,1,86,3;MU=T+24;next T
  16 for C=0to 180;&(10)=C;next C;for T=0to 1500;next T
  18 clear ;BC=3;FC=8;V=400;NT=1;for H=73to 87step 2;box -4,0,H,H,3;next H
  20 A=25;E=0;M=201;S=0;for Y=1to 24;@(Y)=Y+64;gosub 260;next Y;@(25)=32;gosub 260;&(0)=3;&(1)=3;&(9)=30;&(2)=88;&(3)=88
  25 NT=0;CX=47;CY=12;print "PLEASE";CX=50;CY=0;print "STAND";CX=57;CY=-12;print "BY!
  30 U=1;if E=0B=rnd (4);goto 80
  40 I=JX(1);J=JY(1);if TR(1)goto 18
  45 if I=0if J=0goto 40
  50 if Iif Jgoto 40
  60 B=0;if J B=J+2
  70 if I B=3-I
  75 S=S+1;NT=0;CX=-70;CY=0;print #3,S;NT=1
  80 X=A-Adiv 5mul 5;if B=2if X=1goto 240
  90 if B=4if X=0goto 240
 100 if B=3if A>20goto 240
 110 if B=1if A<6goto 240
 120 if B=1D=A-5
 130 if B=2D=A-1
 140 if B=3D=A+5
 150 if B=4D=A+1
 160 X=@(D);@(D)=32;@(A)=X;if E=1goto 190
 165 if E=0M=M-1;CX=50;CY=-30;print "(",#3,M,")
 170 V=V-1;A=D;if V<200box 61,-9,37,51,2;for Y=1to 25;NT=1;gosub 260;next Y;E=1;&(2)=8;&(3)=8;&(9)=7;FC=175
 180 goto 30
 190 Y=D;gosub 260;Y=A;gosub 260;A=D;if U=0goto 30
 200 U=0;Y=0;for X=1to 25;if X=Afor T=0to 500;next T;goto 230
 210 if @(X)<Ygoto 30
 220 Y=@(X)
 230 next X;for X=88to 56step -1;MU=X;next X;FC=3;&(9)=50;NT=7;print "808805608088056080880560400";goto 18
 240 if E=0goto 30
 250 MU=55;MU=58;MU=62;MU=58;goto 30
 260 MU=@(Y);Z=Y-1;CX=-30+(Z-Zdiv 5mul 5)mul 13;CY=30-Zdiv 5mul 14;TV=@(Y);return 
>:return 
